®GLA¯
{{5Help4runcmd}} Help for RUNCMD.PM [XYOS2SHL.ZIP]
®SV01,®FL¯®LM2DI¯®RM78DI¯
RUNCMD.PM  [Part of XYOS2SHL.ZIP]  4/13/96  R. J. Holmgren
Execute defined text as OS/2 batch or REXX command

Usages:
    U2:  runcmd [STARTOS2_parameters] [O2.PM_options]<Helpkey>
   RUN:  run runcmd.pm [STARTOS2_parameters] [O2.PM_options]<cr>

RUNCMD *requires* presence *in U2* of frame ÿ7Bÿ7B5o2ÿ7Dÿ7D
  (having O2.PM on disk only will NOT work)
Command HELP O2<Helpkey> for STARTOS2_parameters and O2.PM_options

If you are executing REXX code rather than ordinary batch commands,
  your first DeFined line must be a comment, e.g.:
/* REXX */


Install: RUNCMD.PM in U2, or
         Run RUNCMD.PM freestanding !*only if*! O2.PM installed in U2

®FC¯
For Use by RENUMBER.PM:
Renumber RUNCMD.PM in PACK mode
Default Save/Get Range=[00|50] 01-05
OPTIONs (2): FREEZE 50; LEFT$ %
®FL¯®LM¯¯
{{m}}

{{5runcmd}} Execute defined text as OS/2 batch or REXX command
®SX00,®IS50¯¯®GLA¯;*;

           USER VARIABLE - Toggle eXPanded view to set Save/Get
           ----------------------------------------------------
           ÿü™  OS/2 BootDriveLetter, e.g. "C"
®LBA¯®SV01,¯;*;
;*;
ÿ‚§®IF®VA|01¯==1&"ABCDEFGHIJKLMNOPQRSTUVWXYZ"ð@UPR(®IS01¯)¯ÿ‚«(es 1)®SX02,®IS00¯+" "¯ÿA®SX03,®IS01¯+":\OS2\MDOS\RUNCMD.CMD"¯®SX04,®IS01¯+":\OS2\MDOS\O2.CMD¯ÿ‚«exist ®PV04¯ÿ‚®IF®ER¯¯®SX01,"Bad drive "+®IS01¯+", or file \OS2\MDOS\O2.CMD not found¯®PR@01¯®EX¯®EI¯;*;
®SV05,¯ÿ‚G®IF®VA$DE¯<1¯®LBB¯®PRNo OS/2 batch or REXX code DeFined - Abort¯®EX¯®EI¯®SV05¯®IF®VA|05¯<1¯®GLB¯®EI¯ÿ‚«exist ®PV03¯ÿ‚®IF@NOT(®ER¯)¯®SX04,"File "+®IS03¯+" may be running - erase it and proceed?  Y|n"¯®PR@04¯®SX04,®RK¯¯®IF"Nn"ð®IS04¯¯®PRAbort¯®EX¯®EI¯ÿ‚«ernv ®PV03¯ÿ‚ÿ‚«waitÿ‚®EI¯ÿ‚«sa %05,®PV03¯ÿ‚ÿ‚«waitÿ‚®SV06,¯®IF""""î®IS02¯==0¯®SV01,"W" ¯®SV04,¯®SV05,¯®XS02,01,04,06,05¯®SX02,®IS05¯¯®EI¯®LBC¯®IF"/"î®IS02¯==0¯®SV01,/W ¯®SV04,¯®SV05,¯®XS02,01,,04,05¯®SX02,®IS05¯¯®SX06,®IS06¯+®IS04¯¯®GLC¯®EI¯®SX50,®IS06¯+" /I CALL "+®IS03¯+" "+®IS02¯¯ÿ‚£2.o2ÿ‚®EX¯®EI¯®PRBad BootDriveLetter spec in frame O2¯®EX¯

ÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2E

{{5go2}} Shell to OS/2 in current drive, dir  Rev.4/13/96
CMD Big Screen

ÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2E

{{5Help4pullos2*,Help4p2*}} Help for PULLOS2.PM [XYOS2SHL.ZIP]
®SV01,®FL¯®LM2DI¯®RM78DI¯
PULLOS2.PM  [Part of XYOS2SHL.ZIP]  3/21/96
  Carl L. Distefano (Rev. R. J. Holmgren)

Issue an OS/2 command, to view output in XyWrite
P2 is a synonym for PULLOS2
In default operation, XyWrite idles while waiting for results.
A terminal foreslash -- PULLOS2/ or P2/ -- launches P2 in background
  and unties XyWrite from the process, permitting you to work while
  results are collected; a beep sounds when OS/2 results are ready,
  so issue P2/ once more to view results

Usage:  pullos2[/] command [arguments] <Helpkey>
  e.g.  p2 su.exe IRQS <Helpkey>
        p2 c:\ff.exe \*.dll /S <Helpkey>
        p2 dir *.dll /o:d /s <Helpkey>
        p2/ grep "stultiloquence OR nugacity" *.tmp <Helpkey>

PULLOS2 *requires* presence of frame ÿ7Bÿ7B5o2ÿ7Dÿ7D *in U2*
  (having O2.PM on disk only will NOT work)

®FC¯
For Use by RENUMBER.PM:
Renumber PULLOS2.PM in PACK mode
Default Save/Get Range=[00|50] 01
OPTION (1): FREEZE 50
®FL¯®LM¯¯
{{m}}

{{5pullos2,pullos2/,p2,p2/}} Import OS/2 command output into XyWrite  CLD (Rev. RJH)
®SX00,®IS50¯¯ÿ‚§®IF®VA$WA¯<1¯®PRNo window¯®EX¯®EI¯;*;
;*;
;*; If no arg, review results and EXit
®SX01,®VADR¯¯®IF®VA|00¯<1¯®IF®VA$FR¯ð"/"¯ÿ‚«exist ®PV01¯pullos2.outÿ‚®IF®ER¯¯®PRNothing to report¯®EX¯®EI¯;*;
;*;
;*; Import results into XyWrite; erase result file
®LBD¯ÿAÿ‚«(ne/100)ÿ‚«me ®PV01¯pullos2.outÿ‚ÿ‚«(wait)ÿ‚«ernv ®PV01¯pullos2.outÿ‚ÿ‚«(wait)ÿ€ñÿ?ÿ;®PRDone¯®EX¯®EI¯®PRNo command¯®EX¯®EI¯;*;
;*;
;*; Erase old copy of result file
ÿ‚«(es 1)ÿ‚«exist ®PV01¯pullos2.outÿ‚®IF@NOT(®ER¯)¯ÿ‚«ernv ®PV01¯pullos2.outÿ‚ÿ‚«(wait)®EI¯;*;
;*;
;*; Pass command to O2; REName result file when done
®SX50,"""PullOS/2 Results"""+" /b /c /r '"+®IS00¯+" >"+®IS01¯+"pullos2.tmp';'ren "+®IS01¯+"pullos2.tmp pullos2.out'"¯®IF®VA$FR¯ð"/"¯®SX50,®IS50¯+";call beep 1000,150"¯ÿ‚£(2.o2)ÿp2/ÿ€}®PR|After beep, command "PULLOS2/<Helpkey>" to view OS/2 results¯®EX¯®EI¯ÿ‚£(2.o2);*;
;*;
;*; Wait for result file to exist
®SX01,®VADR¯¯®PRWaiting for OS/2 results...¯®LBE¯ÿ‚«exist ®PV01¯pullos2.outÿ‚®IF®ER¯¯®GLE¯®EI¯®GLD¯

ÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2E

{{5PrsCMline}} Pass CMline "framename[ argument[,arg...]]<Helpkey>" to U2
®SU50,®SX01,®IS00¯¯¯®GT50¯®IF®VA|01¯<1¯®EX¯®EI¯®SV02,S¯®SV03,¯®XS01,02,50,04,03¯®SV50,¯®IF®IS04¯î®IS01¯<>0!®IS04¯î®IS03¯<0¯®SX03,®IS01¯¯®SV04, ¯®GLF¯®EI¯®IF®IS04¯î®IS03¯<>®VA|03¯-1¯®SX04,®IS04¯+" "¯®EI¯®LBF¯®XS03,04,01,02,50¯ÿ‚£2.®PV01¯ÿ‚

ÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2E

{{5PrsKbdArg}} Pass "framename argumentsNO" to U2 from .KBD file
®SV01,¯®LBG¯®SX02,®RC¯¯®IF®IS02¯=="ÿ§"¯®SV02,,¯®EI¯®IF®IS02¯<>"ÿ£"¯®SX01,®IS01¯+®IS02¯¯®GLG¯®EI¯®SV02,S¯®SV03,¯®XS01,02,50,04,03¯®SV50,¯®IF®IS04¯î®IS01¯<>0!®IS04¯î®IS03¯<0¯®SX03,®IS01¯¯®SV04, ¯®GLH¯®EI¯®IF®IS04¯î®IS03¯<>®VA|03¯-1¯®SX04,®IS04¯+" "¯®EI¯®LBH¯®XS03,04,01,02,50¯®SU03,®SX02,®IS00¯¯¯®GT03¯®IF" "î®IS02¯==0¯®SV03, ¯®XS02,03,04,05,50¯®EI¯ÿ‚£2.®PV01¯ÿ‚

ÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2E

{{5Help4Help}} Issue UserHelp
®SV01,®FC¯
ÿüÏÿüîÿü­ÿüÌÿüéÿüîÿüåÿü ÿüÈÿüåÿüìÿüðÿü ÿüæÿüïÿüòÿü ÿüØÿüùÿü×ÿüòÿüéÿüôÿüåÿü ÿü´ÿü ÿüáÿüîÿüäÿü ÿüØÿüùÿü×ÿüòÿüéÿüôÿüåÿü ÿüæÿüïÿüòÿü ÿü×ÿüéÿüîÿüäÿüïÿü÷ÿüó
C.L.Distefano + R.J.Holmgren - 6/5/95
®FL¯
Displays the Help screen associated with any Help frame

Command:      HELP FRAMENAME<Helpkey>
`Esc'ape aborts the Help screen

®FC¯
For Use by RENUMBER.PM:
Renumber HELP in PACK mode
Default Save/Get Range=[50] 01-07
OPTION (1): FREEZE 50
®FL¯¯
ÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2E

{{5Help}} Execute "Help4" frame, with safety net for non-existent frame (Rev. 11/14/95)
ÿ‚§ÿ‚«(es 1)ÿA®SV01,¯®IF®VA$WA¯<1¯®SV02,No window¯®GLK¯®EI¯®IF®VA|50¯<1¯®SV50,Help¯®EI¯ÿ‚£2.Help4®PV50¯ÿ‚®IF®ER¯!®VA|02¯<1¯®SX02,"No help available for """+@UPR(®IS50¯)+"""¯®GLK¯®EI¯®SX03,®VAWF¯¯®SX03,"ÿ‚«(d wf="+®IS03¯+")"¯ÿ‚«(d wf=0);*;
®SX04,@INT(®VASW¯-2)¯®SX05,"®SZ12PT¯®UFSTANDARD¯®OF¯®IP0,2DI¯®FL¯®LM2DI¯®PW"+®IS04¯+"DI¯®RM¯®NJ¯®RT¯®TS8DI,16DI,24DI,32DI,40DI,48DI,56DI,64DI,72DI¯®FD273DI¯®PL273DI¯®HY0¯®NJ¯"¯®SX06,®VA$NR¯¯®IF®VA\1222¯=="F-DOS"¯®IF®PV06¯==2¯®SX06,1¯®EI¯®EI¯®SX06,@INT(®VASL¯-®PV06¯-4)¯ÿ‚«window ®SX07,®VA$WA¯¯®PV07¯,1,1,®PV04¯,®PV06¯ÿ‚ÿ‚«(ne/®IF®VA\1222¯=="F-DOS"¯9®GLI¯®EI¯25®LBI¯)®GT05¯®GT01¯ÿ€ñ®PREsc removes Help¯ÿ?®LBJ¯®SX02,®RC¯¯®IF"ÿ‚Ùÿ‚«ÿ‚3ÿ‚™ÿûÿ‚Eÿ‚£ÿGÿ€áÿ‚5"ð®IS02¯¯®GLJ¯®EI¯®IF®VA$KC¯>1¯®PV02¯®GLJ¯
®EI¯ÿAÿ‚«(func #®PV07¯)®SX02,®VA$WN¯¯ÿ‚«(ab/nv)®IF®VA$WN¯==®PV02¯&®VA$WO¯>1¯ÿ‚«(rs)®EI¯®PV03¯®SV02, ¯®LBK¯®PR@02¯

ÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2Eÿ2E

